Program Example12;
uses Crt;

{ Программа демонстрирует функцию расцвечивания текста }

begin
	TextColor(Green);
	WriteLn('Зеленый текст');
	TextColor(LightGray); {По неизвестной причине, это значение дает используемый по
	 умолчанию текст цвета (проверено на MacOS 10.7) } 
	WriteLn('Обычный текст');
end.